
option explicit


sub VUI_OteImpuesto_OnEndEditEvent(byval sNameUI)
	' llamo al metodo padre
	call base_VUI_OnEndEditEvent(sNameUI)

	' calculo los impuestos
	dim oDetalleProductosCotizados

	set oDetalleProductosCotizados = new CDetalleProductosCotizados

	set oDetalleProductosCotizados.oObject = oApp.oUIs.Item(sNameUI).oParentUI.oViewUI.oObjectSelected
	oDetalleProductosCotizados.CalcularImpuestos

	oApp.oUIs.Item(sNameUI).oViewUI.Refresh
end sub